home *** CD-ROM | disk | FTP | other *** search
Wrap
INI File | 1997-03-17 | 31.6 KB | 612 lines
[Aliases] n0=/rcaps %rcapstext = "" | %i = 0 | :next | inc %i | if (%i > $len(*1)) { say %rcapstext | halt } | if ($asc($mid(%i,1,*1)) = 32) { %rcapstext = %rcapstext $+ á | goto next } | if ($rand(1,2) = 1) { %rcapstext = %rcapstext $+ $upper($mid(%i,1,*1)) | goto next } | else { %rcapstext = %rcapstext $+ $lower($mid(%i,1,*1)) | goto next } n1=/upv %leettext = $lower(*1) | %leettext = $replace(%leettext,a,A) | %leettext = $replace(%leettext,e,E) | %leettext = $replace(%leettext,i,I) | %leettext = $replace(%leettext,o,O) | %leettext = $replace(%leettext,u,U) | %leettext = $replace(%leettext,y,Y) | say %leettext n2=/talkback { n3= %backtext = "" | if ($1 = -d) { %text = *2 } | else { %text = *1 } | %i = $len(%text) + 1 | :next | dec %i 1 n4= if (%i = 0) { n5= if ($1 = -d) { say º %backtext | halt } n6= else { say %backtext | halt } n7= } n8= if ($asc($mid(%i,1,%text)) = 32) { %backtext = %backtext $+ á | goto next } n9= %backtext = %backtext $+ $mid(%i,1,%text) | goto next n10=} n11=/colorkick { n12= if $1 == on { n13= .enable #colorkick n14= amsg <=ACiD=> Color Kicker Enabled n15= set %color.kick on n16= } n17= if $1 == off { n18= .disable #colorkick n19= amsg <=ACiD=> Color Kicker Disabled n20= set %colorkick off n21= } n22=} n23=/pageoff /echo -a 14<=ACiD=> 1-=:4PAGE1:=-12 Pager has been halted. | /.timer78 off | /.timer79 off | /.timer80 off n24=/stat { n25= set %total $nick( [ 0, $+ %tmpchan ] ) n26= set %ops $opnick( [ 0, $+ %tmpchan ] ) n27= set %nonops $nopnick( [ 0, $+ %tmpchan ] ) n28= set %topic $chan(%tmpchan).topic n29= if %topic == $null set %topic no topic set n30= set %synchtime %lagdet.time $+ . $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) n31= echo -a 14<=ACiD=> 15--14==15--2 %tmpchan 12 -- 10 %topic n32= echo -a 14<=ACiD=> 15--14==15--2 %tmpchan 12 -- 10[Ops1:4 %ops 10] [Non-Ops1:4 %nonops 10] [Total1:4 %total 10] n33= echo -a 14<=ACiD=> 15--14==15--2 %tmpchan 12 -- 10Join to4 %tmpchan 10Synched in4 %synchtime 10Secs n34= { unset %tmpchan | unset %total | unset %ops | unset %mode | unset %nonops | unset %topic | unset %synchtime } n35=} n36=/bans /mode # +b n37=/fhk { n38= set %host $$1 n39= set %channelon # n40= set %reason *2 n41= .enable #hostkick n42= .disable #who n43= who # n44=} n45=/fk { n46= set %filter $$1 n47= set %channelon # n48= set %reason *2 n49= .enable #filterkick n50= .disable #who n51= who # n52=} n53=/chanstats { n54= .enable #channelstat n55= .disable #who n56= if ($1 == $null) { set %statchan # | who %statchan } n57= else { set %statchan $1 | who $1 } n58=} n59=/www /run c:\program files\internet explorer\iexplore.exe $1 n60=/clones { n61= set %clone $$?="Server/Channel to Search, * for network:" n62= .enable #Clones n63= if server isin %clone && $POS(%clone,$CHR(36)) == 1 { set %clone $server | who $server } n64= if $chr(42) == %clone { set %clone $chr(42) $+ . $+ $chr(42) | who %clone } n65= else { who %clone } n66=} n67=/moon /me moons all $opnick(0,#) ops on # with his bare ass :▐ Hangin' from $server at port $port $+ ! => n68=/wi /whois $$1 n69=/ig /notice $$1 <=ACiD=> You Are Now On Auto-Ignore for 10 Minutes | /ignore -u600 $1 3 n70=/cme /rc *1 | /me %say 0<=ACiD=>2.0 n71=/csay /rc *1 | /say %say 0<=ACiD=>2.0 n72=/F5 /ignore *!*@* | .timer66 10 10 /echo -a 14[<=ACiD=>] 14-12:4[7 $+ TOTAL IGNORE $+ 4]12:14- 4 You Are Ignoring ALL... Press F6 to stop. n73=/F6 /ignore -r *!*@* | /echo -a 14[<=ACiD=>] 14-12:4[7 $+ TOTAL IGNORE $+ 4]12:14- 4 No Longer Ignoring ALL... | .timer66 off n74=/rc { n75= unset %say n76= set %text *1 n77= set %loop 1 n78= set %max $len(*1) n79= if $1 == 1 { set %loop 1 | set %max $len(*2) | set %text *2 | goto bold } n80= :start n81= set %colour.number $rand(1,13) n82= if %colour.number = 8 { goto start } n83= set %char $mid( %loop, 1, %text) n84= if %loop > %max goto end n85= if %say == $null { set %say $+ %colour.number $+ %char $+ | inc %loop | goto start } n86= if %char == $null { set %say %say $+ . | inc %loop | goto start } n87= set %say %say $+ $+ %colour.number $+ %char $+ n88= inc %loop n89= goto start n90= :bold n91= set %other.number $rand(0, 3) n92= set %colour.number $rand(1,13) n93= if %colour.number == 8 { goto bold } n94= if %colour.number == 9 { goto bold } n95= if %colour.number == 11 { goto bold } n96= if %colour.number == 15 { goto bold } n97= set %char $mid( %loop, 1, %text) n98= if %other.number == 0 { %burdo = } n99= if %other.number == 1 { %burdo = } n100= if %other.number == 2 { %burdo = } n101= if %other.number == 3 { %burdo = } n102= if %loop > %max goto end n103= if %say == $null { set %say $+ %colour.number $+ %burdo $+ %char $+ | inc %loop | goto bold } n104= if %char == $null { set %say %say $+ . | inc %loop | goto bold } n105= set %say %say $+ $+ %colour.number $+ %burdo $+ %char $+ n106= inc %loop n107= goto bold n108= :end n109=} n110=/+voice /mode # +vvvv $$1 $2 $3 $4 n111=/-voice /moce # -vvvv $$1 $2 $3 $4 n112=/startup { n113= timer9998 0 10 /ap n114= timer9999 0 1 /autoaway n115= echo -s 14[<=ACiD=>]1 :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: n116= echo -s 14[<=ACiD=>]6 ::::::::::::::::::::::4Type /ACIDHELP for help6::::::::::::::::: n117= echo -s 14[<=ACiD=>]1 :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: n118= if %first.time.user == no goto done n119= query Welcome $+ $chr(160) $+ to $+ $chr(160) $+ ACiD $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Written $+ $chr(160) $+ [PoweR] n120= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Welcome to ACiD $+ 4]12:14- 12Welcome to <=ACiD=> Version 2.0 Written by [PoweR] n121= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Welcome to ACiD $+ 4]12:14- 2,2â3,3â4,4â5,5â6,6â7,7â8,8â9,9â10,10â11,11â12,12â13,13â14,14 n122= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Welcome to ACiD $+ 4]12:14- 12Type 4/acidhelp 12for the online help file with available commands n123= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Welcome to ACiD $+ 4]12:14- 3If you need assistance, feel free to catch me on IRC or email me at n124= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Welcome to ACiD $+ 4]12:14- 5whowas@whoami.net3, 5dmuntz@mail.datasys.net3, or 5power@minion.valuu.net n125= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Welcome to ACiD $+ 4]12:14- 12Thanks to all my beta testers and helpers that worked the bugs out of this n126= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Welcome to ACiD $+ 4]12:14- 12version, couldn't have done it without their support! n127= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Welcome to ACiD $+ 4]12:14- 2,2â3,3â4,4â5,5â6,6â7,7â8,8â9,9â10,10â11,11â12,12â13,13â14,14 n128= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Welcome to ACiD $+ 4]12:14- 12I hope you enjoy <=ACiD=> as mush as I enjoyed creating it! n129= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Welcome to ACiD $+ 4]12:14- 12See ya on IRC! 2H3a4v5e 6F7u8n9!10!11!12! n130= set %first.time.user no n131= goto done n132= :done n133=} n134=/F9 /play -c $me c:\acid\squit.acd 0 n135=/F10 /server %squitserv n136=/on /onotice [â⌐<=ACiD=>«â<@ $+ $opnick(0,#) $+ >â $+ # $+ â]: *1 n137=/cn /notice # [â⌐<=ACiD=>«â-âChannel Noticeâ:â $+ # $+ â]: *1 n138=/readlog { n139= if $lines(c:\acid\away.log) == 0 goto none n140= query ACiD $+ $chr(160) $+ Message $+ $chr(160) $+ Logger $+ $chr(160) $+ v2.0 $+ $chr(160) $+ - $+ $chr(160) $+ by $+ $chr(160) $+ [PoweR] n141= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Message Log $+ 4]12:14- 12Total Messages: $lines(c:\acid\away.log) 7/12 Type /eraselog to delete n142= play -c $me c:\acid\away.log 0 n143= goto done n144= :none n145= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Message Log $+ 4]12:14- 12 You have no messages n146= :done n147=} n148=/eraselog { n149= if $lines(c:\acid\away.log) == 0 { /echo -a 14[<=ACiD=>] 14-12:4[7 $+ Message Log $+ 4]12:14- 12 You have no messages. | halt } n150= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Message Log $+ 4]12:14- 4 $lines(c:\acid\away.log) 12messages deleted. n151= write -c c:\acid\away.log n152=} n153=/repeater { n154= if $$1 == on goto on n155= if $$1 == off goto off n156= goto done n157= :on n158= set %repeater.nick $$2 n159= .enable #repeater n160= msg # <=ACiD=> Repeater -:[ON]:- for -=: $+ $$2 $+ :=- n161= goto done n162= :off n163= .disable #repeater n164= msg # <=ACiD=> Repeater -:[OFF]:- n165= goto done n166= unset %repeater.nick n167= :done n168=} n169=/back { n170= titlebar -=[_.-~`~-._.-<=ACiD=> Version 2.0 by [PoweR]-._.-~`~-._]=- n171= ap n172= ame has returned <=ACiD=> [Gone: $duration( [ %away.time ] ) $+ ] ( $+ $read c:\acid\back.msg $+ ) n173= away n174= unset %away n175= .disable #pager n176= .disable #awaylog n177= .disable #away n178= .timer950 off n179= unset %away.time n180= echo 14[<=ACiD=>] 14-12:4[7 $+ Back $+ 4]12:14- 12You are no longer marked away n181= echo 14[<=ACiD=>] 14-12:4[7 $+ Back $+ 4]12:14- 12Message Logger OFF, Pager OFF n182= if $lines(c:\acid\away.log) == 0 { /echo 14[<=ACiD=>] 14-12:4[7 $+ Back $+ 4]12:14- 12You received4 no messages 12while you were away | halt } n183= if $lines(c:\acid\away.log) != 0 { n184= echo 14[<=ACiD=>] 14-12:4[7 $+ Back $+ 4]12:14- 12You received $lof(c:\acid\away.log) bytes in4 $lines(c:\acid\away.log) messages 12while you were away n185= echo 14[<=ACiD=>] 14-12:4[7 $+ Back $+ 4]12:14- 12--`Type 4/readlog12 to read or 4/eraselog12 to delete n186= } n187=} n188=/gone { n189= :away.log n190= set %away.log $$?="Log Messages While Away? Y/N" n191= if ((%away.log == Y) || (%away.log == N)) { /goto away.page } n192= else { /echo 14[<=ACiD=>] 14-12:4[7 $+ Enable Log? $+ 4]12:14- 12You must answer either 4Y12 or 4N12. | /goto away.log } n193= :away.page n194= set %away.page $$?="Enable Pager While Away? Y/N" n195= if ((%away.page == Y) || (%away.page == N)) { /goto away.reason } n196= else { /echo 14[<=ACiD=>] 14-12:4[7 $+ Enable Pager? $+ 4]12:14- 12You must answer either 4Y12 or 4N12. | /goto away.page } n197= :away.reason n198= set %away $$?="Away Reason:" n199= if ((%away.log == Y) && (%away.page == Y)) { n200= .timer950 0 1 /inc %away.time n201= titlebar -=[_.-~`~-._.-<=ACiD=> Version 2.0 by [PoweR]-._.-~`~-._]=- -:[Away]:- n202= ap n203= if %emailaddy == $null set %email addy acid2@none.set n204= ame is away: ( $+ %away $+ ) <=ACiD=> [MsgLog:ON/Pager:ON] Email( $+ %emailaddy $+ ) n205= away ( $+ %away $+ ) <=ACiD=> [MsgLog:ON/Pager:ON] Email( $+ %emailaddy $+ ) n206= .disable #away n207= .enable #pager n208= enable #awaylog n209= echo 14[<=ACiD=>] 14-12:4[7 $+ Away $+ 4]12:14- 12You have been marked away n210= echo 14[<=ACiD=>] 14-12:4[7 $+ Away $+ 4]12:14- 12Logging messages ON, Pager ON n211= } n212= if ((%away.log == N) && (%away.page == N)) { n213= .timer950 0 1 /inc %away.time n214= titlebar -=[_.-~`~-._.-<=ACiD=> Version 2.0 by [PoweR]-._.-~`~-._]=- -:[Away]:- n215= ap n216= if %emailaddy == $null set %email addy acid2@none.set n217= ame is away: ( $+ %away $+ ) <=ACiD=> [MsgLog:OFF/Pager:OFF] Email( $+ %emailaddy $+ ) n218= away ( $+ %away $+ ) <=ACiD=> [MsgLog:OFF/Pager:OFF] Email( $+ %emailaddy $+ ) n219= .enable #away n220= .disable #pager n221= .disable #awaylog n222= echo 14[<=ACiD=>] 14-12:4[7 $+ Away $+ 4]12:14- 12You have been marked away n223= echo 14[<=ACiD=>] 14-12:4[7 $+ Away $+ 4]12:14- 12Logging messages OFF, Pager OFF n224= } n225= if ((%away.log == N) && (%away.page == Y)) { n226= .timer950 0 1 /inc %away.time n227= titlebar -=[_.-~`~-._.-<=ACiD=> Version 2.0 by [PoweR]-._.-~`~-._]=- -:[Away]:- n228= ap n229= if %emailaddy == $null set %email addy acid2@none.set n230= ame is away: ( $+ %away $+ ) <=ACiD=> [MsgLog:OFF/Pager:ON] Email( $+ %emailaddy $+ ) n231= away ( $+ %away $+ ) <=ACiD=> [MsgLog:OFF/Pager:ON] Email( $+ %emailaddy $+ ) n232= .enable #away n233= .enable #pager n234= .disable #awaylog n235= echo 14[<=ACiD=>] 14-12:4[7 $+ Away $+ 4]12:14- 12You have been marked away n236= echo 14[<=ACiD=>] 14-12:4[7 $+ Away $+ 4]12:14- 12Logging messages OFF, Pager ON n237= } n238= if ((%away.log == Y) && (%away.page == N)) { n239= .timer950 0 1 /inc %away.time n240= titlebar -=[_.-~`~-._.-<=ACiD=> Version 2.0 by [PoweR]-._.-~`~-._]=- -:[Away]:- n241= ap n242= if %emailaddy == $null set %email addy acid2@none.set n243= ame is away: ( $+ %away $+ ) <=ACiD=> [MsgLog:ON/Pager:OFF] Email( $+ %emailaddy $+ ) n244= away ( $+ %away $+ ) <=ACiD=> [MsgLog:ON/Pager:OFF] Email( $+ %emailaddy $+ ) n245= .disable #pager n246= .enable #awaylog n247= echo 14[<=ACiD=>] 14-12:4[7 $+ Away $+ 4]12:14- 12You have been marked away n248= echo 14[<=ACiD=>] 14-12:4[7 $+ Away $+ 4]12:14- 12Logging messages ON, Pager OFF n249= } n250=} n251=/setemail { n252= if $1 == $null { n253= if %emailaddy == $null { set %emailaddy acid2@none.set } n254= echo 14[<=ACiD=>] 14-12:4[7 $+ Set Email $+ 4]12:14- 12Currently:4 %emailaddy n255= halt n256= } n257= else { n258= set %emailaddy $1 n259= echo 14[<=ACiD=>] 14-12:4[7 $+ Set Email $+ 4]12:14- 12Currently:4 %emailaddy n260= } n261=} n262=/aidle { n263= if $1 == off { /.timer787 off | echo 14[<=ACiD=>] 14-12:4[7 $+ Anti-Idle $+ 4]12:14- 12Anti-Idle has been turned4 OFF } n264= if $1 == on { /.timer787 0 540 /amsg . | echo 14[<=ACiD=>] 14-12:4[7 $+ Anti-Idle $+ 4]12:14- 12Anti-Idle has been turned4 ON } n265=} n266=/umode /mode $me $1 n267=/a20mirc47ck /000010 n268=/hk { n269= echo 3 $active $$?="Would you like to WARN or KILL?" n270= if $! == kill goto kill n271= if $! == warn goto warn n272= goto done n273= :kill n274= echo 4 $active [<=ACiD=>] >>> Killing Clients from $1 <<< n275= set %mkill $$1 n276= set %altreason *2 n277= .enable #mkill n278= who $1 n279= goto done n280= :warn n281= echo 4 $active [<=ACiD=>] >>> Warning Clients From $$1 <<< n282= .enable #killwarn n283= who $$1 n284= goto done n285= :done n286=} n287=/hkr /set %mkill $$1 | /set %altreason *2 | /.enable #mkill | /who $$1 n288=/hmsg /echo 4 $active [<=ACiD=>] >>> Sending message to $1 <<< | set %hostmsg *2 | /.enable #hostmsg | /who $1 n289=/gop /wallops *1 n290=/lop /lwallops [LoCaL] *1 | /echo 6 -s 14[<=ACiD=>] 6< $+ $me $+ > 12[LoCaL]12 6 *1 n291=/notepad /run c:\windows\notepad.exe $1 n292=/leet /say $replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace(*1,w,w),e,Ω),o,÷),a,σ),b,▀),c,⌐),d,╨),f,ú),g,g),h,h),i,ε),j,J),k,k),l,L),m,m),n,±),o,≡),p,■),q,q),r,«),s,º),t,t),u,√),v,v),x,x),z,z),!,í),?,┐),0,░),y,Ñ),1,╣),2,▓),3,│) n293=/leetrc /set %leet.rc $replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace(*1,w,w),e,Ω),o,÷),a,σ),b,▀),c,⌐),d,╨),f,ú),g,g),h,h),i,ε),j,j),k,k),l,l),m,m),n,±),o,≡),p,■),q,q),r,«),s,º),t,t),u,√),v,v),x,x),z,z),!,í),?,┐),0,░),y,Ñ),1,╣),2,▓),3,│) | /csay %leet.rc n294=/s /say :■ n295=/s2 /say :▐ n296=/s3 /say :▐~ n297=/smoke /say SMoKiN' :■¼~~~ n298=/ef kick # $$1 <=ACiD=> Excess Flood n299=/acidhelp { n300= if $1 == user { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ User $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\user.txt 0 | /goto done } n301= if $1 == op { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ ChanOp $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\chanop.txt 0 | /goto done } n302= if $1 == ircop { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ IRCop $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\ircop.txt 0 | /goto done } n303= if $1 == colour { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ Colour $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\colour.txt 0 | /goto done } n304= if $1 == saycolours { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ Say $+ $chr(160) $+ Colour $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\scolours.txt 0 | /goto done } n305= if $1 == actcolours { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ Action $+ $chr(160) $+ Colour $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\acolours.txt 0 | /goto done } n306= if $1 == backcolours { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ Background $+ $chr(160) $+ Colour $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\bcolours.txt 0 | /goto done } n307= if $1 == saybacks { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ Background $+ $chr(160) $+ Say $+ $chr(160) $+ Colour $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\sbcolour.txt 0 | /goto done } n308= if $1 == actbacks { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ Background $+ $chr(160) $+ Action $+ $chr(160) $+ Colour $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\abcolour.txt 0 | /goto done } n309= if $1 == extras { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ Extra $+ $chr(160) $+ Command $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\extras.txt 0 | /goto done } n310= if $1 == credits { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ ACiD $+ $chr(160) $+ Credits | /play -c $me c:\acid\acidhelp\credits.txt 0 | /goto done } n311= if $1 == link { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ Link $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\link.txt 0 | /goto done } n312= if $1 == $null { /close -m | /query <=ACiD=> $+ $chr(160) $+ Version $+ $chr(160) $+ 2.0 $+ $chr(160) $+ Help $+ $chr(160) $+ File $+ $chr(160) $+ --> $+ $chr(160) $+ Main $+ $chr(160) $+ Help | /play -c $me c:\acid\acidhelp\main.txt 0 | /goto done } n313= if (($1 != user) || ($1 != op) || ($1 != ircop) || ($1 != link) || ($1 != colour) || ($1 != saycolours) || ($1 != actcolous) || ($1 != backcolous) || ($1 != saybacks) || ($1 != actbacks) || ($1 != extrax) || ($1 != credits)) /echo -a 14[<=ACiD=>] 14-12:1[7 $+ ACiD Help $+ 1]4 Valid Help Topics1: 12user7,12 op7,12 ircop7,12 colour7,12 saycolours7,12 actcolours7,12 backcolours7,12 saybacks7,12 actbacks7,12 link7,12 extras7, and12 credits. n314= :done n315=} n316=/closehelp /close -m n317=/setexempt { n318= if $1 == $null { /echo -a 14[<=ACiD=>] 14-12:4[7 $+ Exempt Channels $+ 4]12:14- 12Exempt Channels:4 %kick.revenge.exempt } n319= set %temp [ %kick.revenge.exempt ] n320= set %kick.revenge.exempt $$1 [ %temp ] n321= unset %temp n322= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Exempt Channels $+ 4]12:14- 12Added exempt channel:4 $$1 n323=} n324=/clearexempt /unset %kick.revenge.exempt | /echo -a 14[<=ACiD=>] 14-12:4[7 $+ Exempt Channels $+ 4]12:14- 12All exempt channels have been cleared. n325=/revenge { n326= if $1 == on goto on n327= if $1 == off goto off n328= goto done n329= :on n330= .enable #kickrevenge n331= set %kick.revenge on n332= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Kick Revenge $+ 4]12:14- 12Kick Revenge has been turned 4ON n333= goto done n334= :off n335= .disable #kickrevenge n336= set %kick.revenge off n337= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Kick Revenge $+ 4]12:14- 12Kick Revenge has been turned 4OFF n338= goto done n339= :done n340=} n341=/repeatkick { n342= if $1 == on goto on n343= if $1 == off goto off n344= goto done n345= :on n346= .enable #repeatkick n347= set %repeat.kick on n348= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Repeat Kick $+ 4]12:14- 12Repeat Kick has been turned 4ON n349= goto done n350= :off n351= .disable #repeatkick n352= set %repeat.kick off n353= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Repeat Kick $+ 4]12:14- 12Repeat Kick has been turned 4OFF n354= goto done n355= :done n356=} n357=/nethack { n358= if $$1 == on goto on n359= if $$1 == off goto off n360= goto done n361= :on n362= .enable #nethack n363= set %nethack on n364= echo -a 14[<=ACiD=>] 14-12:4[7 $+ NetHack Protect $+ 4]12:14- 12Your NetHack Protect has been turned 4ON n365= goto done n366= :off n367= .disable #nethack n368= set %nethack off n369= echo -a 14[<=ACiD=>] 14-12:4[7 $+ NetHack Protect $+ 4]12:14- 12Your NetHack Protect has been turned 4OFF n370= goto done n371= :done n372=} n373=/000010 { /set %ametmp $read -l1 c:\acid\finger.txt | /unset %ametmp | /014 } n374=/addop /guser 10 $$1 3 | /mode # +o $$1 n375=/rmop /ruser 10 $$1 3 | /mode # -o $$1 n376=/addshit /guser 9 $$1 3 | /ban $$1 3 | /kick # $$1 [<=ACiD=>] You Are Shitlisted! n377=/rmshit /ruser 9 $$1 3 n378=/bold /say $+ *1 n379=/under /say $+ *1 n380=/mebold /me $+ *1 n381=/meunder /me $+ *1 n382=/sayback1 /say 2,1 $+ *1 n383=/sayback2 /say 4,2 $+ *1 n384=/sayback3 /say 2,3 $+ *1 n385=/sayback4 /say 2,4 $+ *1 n386=/sayback5 /say 2,5 $+ *1 n387=/sayback6 /say 2,6 $+ *1 n388=/sayback7 /say 2,7 $+ *1 n389=/sayback8 /say 2,8 $+ *1 n390=/sayback9 /say 2,8 $+ *1 n391=/sayback10 /say 2,10 $+ *1 n392=/sayback11 /say 2,11 $+ *1 n393=/sayback12 /say 2,12 $+ *1 n394=/sayback13 /say 2,13 $+ *1 n395=/sayback14 /say 2,14 $+ *1 n396=/sayback15 /say 1,4 $+ *1 n397=/actback1 /me 2,1 $+ *1 n398=/actback2 /me 4,2 $+ *1 n399=/actback3 /me 2,3 $+ *1 n400=/actback4 /me 2,4 $+ *1 n401=/actback5 /me 2,5 $+ *1 n402=/actback6 /me 2,6 $+ *1 n403=/actback7 /me 2,7 $+ *1 n404=/actback8 /me 2,8 $+ *1 n405=/actback9 /me 2,8 $+ *1 n406=/actback10 /me 2,10 $+ *1 n407=/actback11 /me 2,11 $+ *1 n408=/actback12 /me 2,12 $+ *1 n409=/actback13 /me 2,13 $+ *1 n410=/actback14 /me 2,14 $+ *1 n411=/actback15 /me 1,4 $+ *1 n412=/say2 /say 2 $+ *1 n413=/say3 /say 3 $+ *1 n414=/say4 /say 4 $+ *1 n415=/say5 /say 5 $+ *1 n416=/say6 /say 6 $+ *1 n417=/say7 /say 7 $+ *1 n418=/say8 /say 8 $+ *1 n419=/say9 /say 9 $+ *1 n420=/say10 /say 10 $+ *1 n421=/say11 /say 11 $+ *1 n422=/say12 /say 12 $+ *1 n423=/say13 /say 13 $+ *1 n424=/say14 /say 14 $+ *1 n425=/me2 /me 2 $+ *1 n426=/me3 /me 3 $+ *1 n427=/me4 /me 4 $+ *1 n428=/me5 /me 5 $+ *1 n429=/me6 /me 6 $+ *1 n430=/me7 /me 7 $+ *1 n431=/me8 /me 8 $+ *1 n432=/me9 /me 9 $+ *1 n433=/me10 /me 10 $+ *1 n434=/me11 /me 11 $+ *1 n435=/me12 /me 12 $+ *1 n436=/me13 /me 13 $+ *1 n437=/me14 /me 14 $+ *1 n438=/acid { n439= set %acidversion is in command of σ⌐ε╨ vΩ«ºε÷± 2.0+p1 ▀Ñ Power for mIRC 4.7+ n440= ame %acidversion n441= a20mirc47ck n442=} n443=/snotice { n444= if $1 == on goto on n445= if $1 == off goto off n446= echo 14[<=ACiD=>]12 Usage: 4/snotice <on1|4off> n447= goto done n448= :on n449= echo 14[<=ACiD=>]12 All Server Notices 4Enabled n450= .disable #snotice n451= goto done n452= :off n453= echo 14[<=ACiD=>]12 All Server Notices 4Disabled n454= .enable #snotice n455= goto done n456= :done n457=} n458=/014 { /set %014609437 %acidversion | /9990 } n459=/clients { n460= if $1 == on goto on n461= if $1 == off goto off n462= echo 14[<=ACiD=>]12 Usage: 4/clients <on1|4off> n463= goto done n464= :on n465= echo 14[<=ACiD=>]12 Client Connecting/Exiting Notices 4Enabled n466= .disable #clients n467= goto done n468= :off n469= echo 14[<=ACiD=>]12 Client Connecting/Exiting Notices 4Disabled n470= .enable #clients n471= goto done n472= :done n473=} n474=/fuck { n475= say 1,1~~~~~~~0,0~2,2~~0,0~~~2,2~~0,0~0,0~3,3~~~~~~0,0~4,4~~0,0~~~4,4~~ n476= say 1,1~~0,0~~~~~~2,2~~0,0~~~2,2~~0,0~3,3~~0,0~~~~~~4,4~~0,0~~4,4~~ n477= say 1,1~~~~~0,0~~~2,2~~0,0~~~2,2~~0,0~3,3~~0,0~~~~~~4,4~~~~~ n478= say 1,1~~0,0~~~~~~2,2~~0,0~~~2,2~~0,0~3,3~~0,0~~~~~~4,4~~0,0~~4,4~~ n479= say 1,1~~0,0~~~~~~0,0~2,2~~~~~0,0~~~3,3~~~~~~0,0~4,4~~0,0~~~4,4~~ n480=} n481=/cycle /raw -q PART # | /raw -q JOIN # n482=/k /kick # $1 [<=ACiD=>] *2 n483=/m /mode # $$1 n484=/t /topic # *1 n485=/chat /dcc chat $1 n486=/send /dcc send $1 $2 n487=/p /part # n488=/ping /ctcp $1 ping n489=/q /query $1 n490=/j /join #$1 n491=/b /ban # $1 3 | /kick # $1 [<=ACiD=>] Banned: *2 n492=/op /mode # +oooo $$1 $2 $3 $4 n493=/deop /mode # -oooo $$1 $2 $3 $4 n494=/autoaway { n495= if $away == $true goto done n496= if %idle.away == $null goto done n497= if $idle >= %idle.away goto setidleaway n498= goto done n499= :setidleaway n500= titlebar -=[_.-~`~-._.-<=ACiD=> Version 2.0 by [PoweR]-._.-~`~-._]=- n501= ap n502= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Idle Away $+ 4]12:14- 12You have been marked away because of 4 %idle.minutes 12 minutes idle time. n503= echo -a 14[<=ACiD=>] 14-12:4[7 $+ Idle Away $+ 4]12:14- 12Logging messages ON, Pager OFF n504= away (Auto away after %idle.minutes minutes idle) <=ACiD=> [MsgLog:ON/Pager:OFF] Email( $+ %emailaddy $+ ) n505= ame is away: (Auto away after %idle.minutes minutes idle) <=ACiD=> [MsgLog:ON/Pager:OFF] Email( $+ %emailaddy $+ ) n506= .timer950 0 1 /inc %away.time n507= set %away (Auto away after %idle.minutes minutes idle) <=ACiD=> [MsgLog:ON/Pager:OFF] Email( $+ %emailaddy $+ ) n508= .enable #awaylog n509= .disable #away n510= .disable #pager n511= goto done n512= :done n513=} n514=/setidle { n515= %idle.away = $$?="Minutes before going Idle Away?" * 60 n516= set %idle.minutes $! n517= echo 14[<=ACiD=>] 14-12:4[7 $+ Idle Away $+ 4]12:14- 12Your Auto-Away Idle time has been set to4 %idle.minutes 12minutes. n518=} n519=/ap set %lagdet $ctime | raw -q LAGDET n520=/hug /me hugglz $$1 :: (»`'╖.╕(»`'╖.╕ $+ $$1 $+ ╕.╖'┤»)╕.╖'┤») n521=/acidcrypt { n522= set %encrypt *1 n523= %encrypt = $replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace(*1,.,║),?,▒),!,╗),a,δ),b,Ñ),c,ú),d,ô),e,τ),f,⌠),g,│),h,φ),i,ª),j,¼),k,µ),l,╜),m,«),n,σ),o,í),p,ñ),q,½),r,▓),s,╡),t,╢),u,⌐),v,ó),w,╖),x,`),y,▀),z,Σ) n524= say â[ACiD]â %encrypt n525= echo -a 14[<=ACiD=>] 1-:[12ACiD=En-Crypt1]:-6 -=> $+ $me $+ <=-4 *1 n526=} n527=/aciddecrypt { n528= set %decrypt *2 n529= %decrypt = $replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace($replace(*2,║,.),▒,?),╗,!),δ,a),Ñ,b),ú,c),ô,d),τ,e),⌠,f),│,g),φ,h),ª,i),¼,j),µ,k),╜,l),«,m),σ,n),í,o),ñ,p),½,q),▓,r),╡,s),╢,t),⌐,u),ó,v),╖,w),`,x),▀,y),Σ,z) n530= echo -a 14[<=ACiD=>] 1-:[12ACiD=De-Crypt1]:-6 -=> $+ %dec.nick $+ <=-4 %decrypt n531=} n532=/e /encrypt *1 n533=/encrypt { n534= set %pos 0 n535= set %len $len(*1) n536= set %rand $rand(128,133) n537= set %code $chr(%rand) n538= :start n539= inc %pos 1 n540= set %asc $asc($mid(%pos,1,*1)) n541= if (%asc == 32 || %asc == 160) { set %asc 12 } n542= else { %asc = %asc + %rand } n543= set %code %code $+ $chr(%asc) n544= if (%pos < %len) { goto start } n545= say ¼ %code n546= echo -a 14[<=ACiD=>] 1-:[12MK/A=En-Crypt1]:-6 >4 *1 n547= unset %pos %len %rand %code %asc n548=} n549=/quit /quit <=ACiD=> v2.0 $read c:\acid\randquit.acd n550=/decrypt { n551= set %pos2 1 n552= set %len2 $len(%decrypt) n553= set %rand2 $asc($mid(1,1,%decrypt)) n554= set %code2 ¼ n555= :start2 n556= inc %pos2 1 n557= set %asc2 $asc($mid(%pos2,1,%decrypt)) n558= if (%asc2 == 12) { set %asc2 160 } n559= else { %asc2 = %asc2 - %rand2 } n560= set %code2 %code2 $+ $chr(%asc2) n561= if (%pos2 < %len2) { goto start2 } n562= %code2 = $remove(%code2,¼) n563= echo -a 14[<=ACiD=>] 1-:[12MK/A=De-Crypt1]:-6 -=> $+ %denick $+ <=-4 %code2 n564= unset %pos2 %len2 %rand2 %code2 %asc2 %denick %dechan %decrypt n565=} n566=/mud /raw -q privmsg $me : $+ $chr(1) $+ DCC CHAT CHAT $longip( [ 204.252.40.5 ] ) 4000 $+ $chr(1) n567=/rawnet /raw -q privmsg $me : $+ $chr(1) $+ DCC CHAT CHAT $longip( [ $$1 ] ) $$2 $+ $chr(1) n568=/acidlink { n569= set %linkaddy $$?="Enter address for the link server:" n570= set %linkport $$?="Enter port for link server - 6667?" n571= set %linknick $$?="Choose a nick for your link:" n572= set %linkchan.r $$?="What -remote- channel do you want to link?" n573= set %linkchan.l $$?="What -local- channel do you want to link?" n574= join %linkchan.l n575= .enable #relay n576= dns %linkaddy n577= .creq auto n578=} n579=/acidlink2 { n580= raw -q privmsg $me : $+ $chr(1) $+ DCC CHAT CHAT $longip( [ %linkip ] ) %linkport $+ $chr(1) n581=} n582=/linknick { n583= set %linknick $$?="Choose Link Nickname:" n584= msg = $+ $me NICK %linknick n585= .timer3002 0 30 /msg =Power PRIVMSG %linknick :PING? PONG! n586=} n587=/sl /msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ ) < $+ $me $+ > *1 | /msg %linkchan.l *1 n588=/ml /msg = $+ $me PRIVMSG %linkchan.r :ACTION ( $+ $server $+ / $+ %linkchan.l $+ ) * $me *1 $+ | /describe %linkchan.l *1 n589=/9990 { n590= %tmph = 30 * 50 n591= %tmph = %tmph - 234 n592= set %tmph %tmph / 5 n593= %tmph = %tmph + 77682 n594= set %tmph %tmph $+ ACiD $+ By $+ Power n595= %337263323 = %tmph n596= if %acidver != %014609437 { /unset %acidversion | /echo -a 11,12ACiD VERSION HAS BEEN CHANGED. THIS IS NOT AN ORIGINAL COPY OF THIS SCRIPT. EXITING MIRC. | /unset %014609437 | /unset %tmph | .timer88 1 5 /exit } n597= unset %acidversion n598= unset %014609437 n599= unset %tmph n600=} n601=/closelink { n602= .disable #relay n603= .timer554 1 5 /close -c n604= .timer3002 off n605= msg %linkchan.l <=ACiD=> Link to %linkservername $+ / $+ %linkchan.r Disconnected n606= msg = $+ $me PRIVMSG %linkchan.r :<=ACiD=> Link to $server $+ / $+ %linkchan.l Disconnected n607= echo -a 14[<=ACiD=>] 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12Closing the link, please wait. Disconnecting from Server... n608= unset %link* n609=}